MacFormat 2000 July/macformat-092.iso/MacFormat 92 CD/Shareware Plus/Utilities/FolderSynchronizer 1.8.9/PlugIn/SR/00049_ScrBtnShort.ls

Text File | 2000-03-23 | 618 b | 26 lines

on beginSprite me
  global gShortFlag
  set mySprite to the spriteNum of me
  if gShortFlag = 1 then
    set the member of sprite mySprite to "BtnDwShort"
  else
    set the member of sprite mySprite to "BtnUpShort"
  end if
end

on mouseDown me
  global gShortFlag, gLogPathList
  set mySprite to the spriteNum of me
  if gShortFlag = 0 then
    set gShortFlag to 1
    set the member of sprite mySprite to "BtnDwShort"
    if count(gLogPathList) > 0 then
      set the member of sprite (mySprite + 1) to "BtnUpLong"
    end if
    updateStage()
    ReadLogText()
    ImpostaHThumb()
    DrawVControls()
  end if
end